home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 007 / examples.arc / SUB1.PRO < prev   
Text File  |  1986-10-07  |  202b  |  7 lines
  1. project "myproj"
  2. include "globdef.pro"
  3. clauses
  4.  welcome(Name):-write("Welcome ",Name),
  5.                 write(".  Nice to meet you."),
  6.                 sound(25,600),
  7.                 sound(10,200).